<%

Function torneio_lista_aumentar_fase (conexao, id_grupo, clube)


			str = "Select fase FROM torneios_lista where id_clube="&clube&" AND id_grupo="&id_grupo
			Set rs = conexao.Execute(str)	
			
			str = "UPDATE torneios_lista SET "
			str = str & "fase='"&(rs("fase")+1)&"' "
			str = str & " WHERE id_clube="&clube&" AND id_grupo="&id_grupo
			Set rsI = conexao.Execute(str)


End Function

Function torneio_lista_geral (conexao, torneios)


			str = "Select id, nome, temporada, status, id_tipo FROM torneios_geral order by temporada desc, nome asc"
			Set rs = conexao.Execute(str)	
			
			DIM total
			
			total=0
			
			Do while not rs.eof
			
				torneios(total,0)=rs("id")
				torneios(total,1)=rs("nome")
				torneios(total,2)=rs("temporada")
				torneios(total,3)=rs("status")
				torneios(total,4)=rs("id_tipo")
				
				total=total+1
			
			rs.MoveNext
			Loop
			
			torneio_lista_geral = total


End Function

Function torneio_lista_tipos (conexao, tipos)


			str = "Select id, nome FROM torneios_tipos order by nome asc"
			Set rs = conexao.Execute(str)	
			
			DIM total
			
			total=0
			
			Do while not rs.eof
			
				tipos(total,0)=rs("id")
				tipos(total,1)=rs("nome")
				
				total=total+1
			
			rs.MoveNext
			Loop
			
			torneio_lista_tipos = total


End Function




%>